home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 03 - 1987 / 03.01 Jan 87 / pascal source / MyWrite.R < prev    next >
Encoding:
Text File  |  1986-11-25  |  1.6 KB  |  197 lines  |  [TEXT/EDIT]
  1. *MyWrite.R
  2. *
  3.  
  4. MyWrite.RSRC
  5. ????????
  6.  
  7. Type DAV1 = STR 
  8.     ,0
  9. © by David E. Smith    ver 0.2    20 Sep 1986
  10.  
  11. Type FREF
  12. ,128
  13. APPL 0
  14. ,129
  15. TEXT 1
  16.  
  17. Type BNDL
  18. ,128
  19. DAV1 0
  20. ICN#
  21. 0 128 1 129
  22. FREF 
  23. 0 128 1 129
  24.  
  25. * ------ Switcher events ---------
  26.  
  27. Type SIZE = GNRL
  28.     ,-1
  29. .I
  30. 16384    ;;set bit 14 for resume
  31. .L
  32. 98304    ;; 128K preferred
  33. .L
  34. 98304    ;; 128K minimum
  35.  
  36. * ------------- menus -------------
  37.  
  38. Type MENU
  39. * the desk acc menu
  40.     ,256
  41. \14        ;;apple menu
  42.     About MyWrite…
  43.     (-
  44.  
  45. * the file menu
  46.     ,257
  47. File
  48.     New /N
  49.     (Open…
  50.     Close
  51.     (Save
  52.     (Save as…
  53.     (Page Setup…
  54.     (Print…
  55.     (-
  56.        Quit /Q
  57.  
  58. * the edit menu
  59.     ,258
  60. Edit
  61.     (Undo /Z
  62.     (-
  63.     Cut /X
  64.     Copy /C
  65.     Paste /V
  66.     Clear /D
  67.     (-
  68.     Select All /A
  69.     Show Clipboard 
  70.  
  71. * the search menu
  72.     ,259
  73. Search
  74.  
  75.  
  76. * the format menu
  77.     ,260
  78. Format
  79.  
  80.  
  81. * the font menu
  82.     ,261
  83. Font
  84.  
  85.  
  86. * the size menu
  87.     ,262
  88. Size
  89.     6
  90.     9
  91.     10
  92.     12
  93.     14
  94.     18
  95.     24
  96.     36
  97.     48
  98.     72
  99.     (-
  100.     Other…
  101.  
  102. * the style menu
  103.     ,263
  104. Style
  105.     Plain Text!\12 /P
  106.     Bold<B /B
  107.     Italic<I /I
  108.     Underline<U /U
  109.     Outline<O /O
  110.     Shadow<S /S
  111.     Condense
  112.     Extend
  113.     (-
  114.     Left /L
  115.     Center /M
  116.     Right /R
  117.  
  118. * the mode menu
  119.     ,264
  120. Mode    
  121.     Or
  122.     Xor
  123.     Bic
  124.  
  125. * the transfer menu
  126.     ,265
  127. Transfer
  128.     (-
  129.     (Other…
  130.  
  131. type DLOG
  132.     ,128
  133. About MyWrite…
  134. 100 100 250 400 
  135. Visible NoGoAway 
  136. 1
  137. 0
  138. 128
  139.  
  140. type DITL
  141.     ,128
  142. 5
  143. BtnItem Enabled
  144. 112 235 141 284 
  145. OK
  146.  
  147. StatText Disabled
  148. 14 55 30 256 
  149. MyWrite Text Edit Demo V1.0
  150.  
  151. StatText Disabled
  152. 35 130 52 163 
  153. by
  154.  
  155. StatText Disabled
  156. 57 91 73 191 
  157. David E. Smith
  158.  
  159. PicItem Disabled
  160. 70 9 156 80 
  161. 128
  162.  
  163. type DLOG
  164.     ,129
  165. OtherSize
  166. 130 120 207 355 
  167. Visible NoGoAway 
  168. 1
  169. 0
  170. 129
  171.  
  172. type DITL
  173.     ,129
  174. 3
  175. BtnItem Enabled
  176. 48 179 74 228 
  177. OK
  178.  
  179. StatText Disabled
  180. 5 32 25 205 
  181. Select Font Size: ^0
  182.  
  183. EditText Disabled
  184. 27 76 44 144 
  185.  
  186. include DataFrame:MYICON#
  187.  
  188. include DataFrame:MYPICT
  189.  
  190.  
  191.  
  192.  
  193.  
  194.  
  195.  
  196.  
  197.